home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / kang / solar fabric < prev    next >
Text File  |  1999-06-15  |  589b  |  25 lines
  1. Category: kang
  2. Title: solar Fabric
  3. Copyright: na
  4. Author: kangaroo@asan.com
  5. Filename: SOLARFAB.8BF
  6.  
  7. R:put(((cos(c*ctl(2)*20/M)*cos(d*val(0,21,52)*40/M)-y%x^22222)*(sin(sin(d*val(1,21,52)*80/D))))/+17230,1),put(get(1)*200/-100/-100,0),get(0)&256?200-(get(0)+110+ctl(3)):get(0)+c-80
  8.  
  9. G:put(get(1)*200/-100/-100,0),get(0)&256?200-(get(0)+110+ctl(3)):get(0)+c-80
  10.  
  11. B:put(get(1)*200/-100/-100,0),get(0)&256?200-(get(0)+110+ctl(3)):get(0)+c-80
  12.  
  13. A:a
  14.  
  15. ctl[0]: fold once
  16. ctl[1]: fold twice
  17. ctl[2]: solar noize
  18. ctl[3]: gray-away
  19.  
  20. val[0]: 255
  21. val[1]: 50
  22. val[2]: 153
  23. val[3]: 40
  24.  
  25.